home *** CD-ROM | disk | FTP | other *** search
/ MacWorld 1998 May / Macworld (1998-05).dmg / Games World / Shareware Games / Arcade / Supreme Commander / Supreme Commander.mac / 00210.ls < prev    next >
Encoding:
Text File  |  1996-01-30  |  768 b   |  30 lines
  1. on mouseDown
  2.   global occupied, topupied, shaker
  3.   set shaker to 1
  4.   if the visible of sprite 11 = 0 then
  5.     puppetSprite(9, 1)
  6.     set the visible of sprite 8 to 0
  7.     set the locV of sprite 9 to 220
  8.     set the locH of sprite 9 to 480
  9.     set the visible of sprite 9 to 1
  10.     set the visible of sprite 6 to 0
  11.     set the castNum of sprite 11 to 20
  12.     set occupied to 2
  13.     set the visible of sprite 11 to 1
  14.     puppetSprite(11, 1)
  15.   else
  16.     puppetSprite(12, 1)
  17.     set the locV of sprite 12 to 210
  18.     set the locH of sprite 12 to 481
  19.     set the visible of sprite 12 to 1
  20.     set the visible of sprite 6 to 0
  21.     puppetSprite(17, 1)
  22.     dontcover()
  23.     set topupied to 2
  24.   end if
  25.   checkpoker()
  26.   set the visible of sprite 31 to 1
  27.   SHWUNK()
  28.   updateStage()
  29. end
  30.